home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / color.dxr / 00178.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  537 b   |  25 lines
  1. on exitFrame me
  2.   global r1, g1, b1, X, Y, squarecolor
  3.   set the constraint of sprite 32 to 30
  4.   set the locH of sprite 32 to 726
  5.   set the locV of sprite 32 to 48
  6.   set the constraint of sprite 31 to 0
  7.   set the locH of sprite 31 to 736
  8.   set the locV of sprite 31 to 58
  9.   X = 0
  10.   Y = 17
  11.   r1 = 255
  12.   g1 = 0
  13.   b1 = 0
  14.   put sprite(32).color
  15.   sprite(32).color = rgb(r1, g1, b1)
  16.   squarecolor = "red"
  17.   showit(185, 187)
  18.   hideit(188, 190)
  19.   showit(191, 191)
  20.   hideit(192, 197)
  21.   showit(198, 200)
  22.   hideit(201, 202)
  23.   showit(203, 203)
  24. end
  25.